Workbench Design/WB Collection.iso/workbench werkzeuge/memory & system tools/tinymeter/install

Text File | 1996-04-07 | 6KB | 201 lines

; Installer Script for TinyMeter V4.0

(set @default-dest (""))

(set @cpu (database "cpu"))

(set @source-file "TinyMeter")

(if (= @cpu "68020")
    (set @source-file "TinyMeter.020")
)

(if (= @cpu "68030")
    (set @source-file "TinyMeter.020")
)

(if (= @cpu "68040")
    (set @source-file "TinyMeter.020")
)

(if (= @cpu "68060")
    (set @source-file "TinyMeter.020")
)

(set @destdir
        (askdir
                (prompt "Where should I copy the TinyMeter main program ?")
                (help "SYS:WBStartup is the best place. Simply click proceed.")
                (default "SYS:WBStartup/")
        )
)

(set @prefsdir
        (askdir
                (prompt "Where should I copy the TinyMeterPrefs program?")
                (help "SYS:Prefs is the best place, since TinyMeter can only call it, when its there.")
                (default "SYS:Prefs/")
        )
)

(set @NewIcons
        (askbool
                (prompt "Do you use NewIcons® ?")
                (help "NewIcons® is a new icon-system with colorful icons. This script installs special icons for use with it.")
        )
)

(set @CopyExample
        (askbool
                (prompt "Do you want to install the example MagicWB-settings file?\nPreferences from an older version cannot be reused!\n\nNOTE: You will have to install the additional fonts and the background pictures. Make sure you install the background pattern in SYS:Prefs/Patterns/ !!!")
                (help "Its an example setting. It uses Leater as background and all supplied font.")
        )
)

(set @CopyFonts
        (askbool
                (prompt "Do you want to install the additional Fonts?\n(NOTE: The fonts have changed in version 3.6!)")
                (help "The additional Font:\n 1. TinyMeter_DIGITAL (for the clock and the date)\n 2. TinyMeter_DIGITAL_Med (for med-res resolutions)\n 3. XHelvetica (standard XEN-Font)")
        )
)

(if @CopyFonts
    (set @fontdir
            (askdir
                    (prompt "Where should the fonts be installed?")
                    (help "FONTS: is the best place. Simply click proceed.")
                    (default "FONTS:")
            )
    )
)

(if @CopyFonts
    (set @dofixfont
            (askbool
                    (prompt "Should I do FixFonts for you?")
                    (help "This is not important. Simply click no.")
            )
    )
)

(set @CopyPatt
        (askbool
                (prompt "Do you want to install the additional Background patterns?")
                (help "Backgrounds:\n1. BLUE_Leater (nice background using RomIcons-palette\n2. Leather (standard MagicWB-pattern)\n3. Sand (standard MagicWB-patterm)")
        )
)

(if @CopyPatt
    (set @pattdir
            (askdir
                    (prompt "Where should the background patterns be installed?\n (example settings-file uses SYS:Prefs/Patterns!)")
                    (help "SYS:Prefs/Patterns is the best place.")
                    (default "SYS:Prefs/")
            )
    )
)

(copyfiles
        (prompt "Installing the files." )
        (help "Where's the problem?" )
        (source @source-file )
        (infos)
        (newname "TinyMeter")
        (dest @destdir)
)

(copyfiles
        (prompt "Installing TinyMeter.")
        (help "Where's the problem?")
        (source "Prefs/TinyMeterPrefs")
        (infos)
        (newname "TinyMeterPrefs")
        (dest @prefsdir)
)

(copyfiles
        (prompt "Installing catalog")
        (help "Where's the problem?")
        (source "Catalogs/deutsch/TinyMeterPrefs.catalog")
        (dest "LOCALE:Catalogs/deutsch/")
)

(if @NewIcons
        (copyfiles
                (prompt "Installing NewIcons")
                (help "Where's the problem?")
                (source "ArtWork/newicons/TinyMeter.info")
                (dest @destdir)
        )
)

(if @NewIcons
        (copyfiles
                (prompt "Installing NewIcons")
                (help "Where's the problem?")
                (source "ArtWork/newicons/TinyMeterPrefs.info")
                (dest @prefsdir)
        )
)

(if @CopyExample
    (copyfiles
            (prompt "Installing example settings-file in ENV:")
            (help "Where's the problem?")
            (source "Examples/MagicWB.tm")
            (newname "TinyMeter")
            (dest "ENV:")
    )
)

(if @CopyExample
    (copyfiles
            (prompt "Installing example settings-file in ENVARC:")
            (help "Where's the problem?")
            (source "Examples/MagicWB.tm")
            (newname "TinyMeter")
            (dest "ENVARC:")
    )
)

(if @CopyFonts
    (copyfiles
            (prompt "Installing additional fonts.")
            (help "Where's the problem?")
            (source "ArtWork/Fonts/")
            (all)
            (dest @fontdir)
    )
)

(if @CopyFonts
    (if @dofixfont
            (run "SYS:System/FixFonts"
                    (prompt "Doing FixFonts... May take a while...")
                    (help "Where's the problem?")
            )
    )
)

(if @CopyPatt
    (copyfiles
            (prompt "Installing additional background patterns.")
            (help "Where's the problem?")
            (source "ArtWork/Patterns/")
            (all)
            (dest @pattdir)
    )
)

(copylib
        (prompt "Installing screennotify.library")
        (help "Where's the problem?")
        (source "Libs/screennotify.library")
        (dest "LIBS:")
        (confirm)
)

(exit
        "Have phun with this nice piece of soft!!!\n\nNow you should start TinyMeter, setup the position and size and press S to save these settings.\n\nAfter that, start TinyMeterPrefs to setup TinyMeter to your personal taste.\n\nIf there are any problems, don't hesitate to contact the author!"
)